home *** CD-ROM | disk | FTP | other *** search
GW-BASIC | 1995-09-21 | 412 b | 27 lines |
- 1 CLS
- 4 BLOAD "CAPS.DAT"
- 5 FOR A = 1 TO 40000
- 6 NEXT A
- 10 BLOAD "OPENING.DAT"
- 20 PLAY "MLT255L2O2EL4"
- 30 PLAY "F+L1GP4L2F+L4DL1"
- 35 CLS
- 36 BLOAD "SEQ1.DAT"
- 40 PLAY "<GP4L2>EL4"
- 50 PLAY "F+L1GP8L2F+L4"
- 55 CLS
- 56 BLOAD "SEQ2.DAT"
- 60 PLAY "DL1B.AP2L2"
- 65 CLS
- 66 BLOAD "SEQ3.DAT"
- 70 PLAY "EL4F+L1GP4L2F+L4"
- 75 CLS
- 76 BLOAD "SEQ4.DAT"
- 80 PLAY "DL1<AP4G"
- 85 CLS
- 86 BLOAD "SEQ5.DAT"
- 90 PLAY "EL2DL1F+"
- 91 FOR HMM = 1 TO 4000
- 92 NEXT HMM
- 93 RUN "LMECH.BAS"
-